home *** CD-ROM | disk | FTP | other *** search
/ Pascal Super Library / Pascal Super Library (CW International)(1997).bin / GRP_CVTR / REALIZ10 / CRANE.RDR < prev    next >
Text File  |  1994-05-24  |  1KB  |  37 lines
  1. * Crane
  2.  
  3. global
  4.     sky cloudy
  5.     floor none
  6.  
  7. insert before_textures begin_insert
  8. #include "rshapes.inc"
  9. end_insert
  10.  
  11. texture 174 finish glassy
  12.  
  13. layer rightp layer_texture pigment_map pingfab up z right x
  14.     finish glossy
  15. layer stripe layer_texture pigment_map check   up z right x
  16.     on cylinder finish glossy
  17.  
  18. block co block_texture pigment_map arrow on plane fit_all
  19.  
  20. block ELLIPS external Ellipsoid
  21. block ELLIPS_1 external Ellipsoid_1
  22. block ELLIPS_2 external Ellipsoid_2
  23. block ELLIPS_3 external Ellipsoid_3
  24. block CUBE   external Cube
  25. block LIGHT  external Light
  26. block SUN    external Sun
  27. block DISK_X external Disk_X
  28. block DISK_Y external Disk_Y
  29. block DISK_Z external Disk_Z
  30. block CONE_X external Cone_X
  31. block CONE_Y external Cone_Y
  32. block CONE_Z external Cone_Z
  33. block HBEAM  external Hbeam
  34. block WEDGE  external Wedge
  35. block ELBOW1  external Elbow1   bounded_by -0.15 -0.05 -0.11 1.05 1.15 0.11
  36. block ELBOW05  external Elbow05 bounded_by -0.075 -0.025 -0.06 1.025 1.075 0.06
  37.